procedure ScriptEvent (var Value : variant);

begin

Globals['MyGlobal'].AsString := 'abc';

end;

This example sets a super global called MyGlobal to 'abc'. If the super global does not already exist it will be created. If it does exist it will be updated with the new value.

procedure ScriptEvent (var Value : variant);

begin

Value := Globals['MyGlobal'].AsString;

end;

This example reads the value of the super global called MyGlobal. If the super global does not already exist it will return a null value (depending on the accessor used - in this case .AsString is used therefore it will return a blank string)

Super Globals can be accessed outside of scripts where ever See "Tags" are supported. To access a super global as a tag you should entered the super globals name surrounded by the opening tag <$ and closing tag $>. For example to access a super global called MyGlobal you would enter the tag <$MyGlobal$>

procedure ScriptEvent (var Value : variant);

begin

Globals['MyGlobal'].DisplayFormat := 'yyyy-mm-dd';

Globals['MyGlobal'].DisplayFormat := '#0.00';

end;

When accessing Float and Datetime type Super Globals with AsString or through Tags, you can control the format of the resulting string value. The above example shows how to set the Display Format. See See "Number Format Specifiers" and See "Date Format Specifiers" for appropriate format specifiers.

procedure ScriptEvent (var Value : variant);

begin

Globals.RemoveGlobal('MyGlobal');

end;

This example deletes the super global called MyGlobal. If the super global does not exist nothing will happen - you will not receive an error message.

procedure ScriptEvent (var Value : variant);

begin

Globals.ClearAllGlobals;

end;

This example deletes all super globals.